home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Toolbox / Visual Basic Toolbox (P.I.E.)(1996).ISO / codeprnt / clipprnt / about.frm (.txt) next >
Encoding:
Visual Basic Form  |  1995-07-04  |  2.4 KB  |  81 lines

  1. VERSION 2.00
  2. Begin Form frmAbout 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   3  'Fixed Double
  5.    Caption         =   "About Clipboard Printer"
  6.    ClientHeight    =   1530
  7.    ClientLeft      =   4080
  8.    ClientTop       =   1260
  9.    ClientWidth     =   4500
  10.    Height          =   1935
  11.    Icon            =   ABOUT.FRX:0000
  12.    Left            =   4020
  13.    LinkTopic       =   "Form2"
  14.    MaxButton       =   0   'False
  15.    MinButton       =   0   'False
  16.    ScaleHeight     =   1530
  17.    ScaleWidth      =   4500
  18.    Top             =   915
  19.    Width           =   4620
  20.    Begin CommandButton Command1 
  21.       BackColor       =   &H00FFFFFF&
  22.       Caption         =   "OK"
  23.       Height          =   375
  24.       Left            =   3420
  25.       TabIndex        =   2
  26.       Top             =   1080
  27.       Width           =   915
  28.    End
  29.    Begin Label Label3 
  30.       BackColor       =   &H00C0C0C0&
  31.       Caption         =   "Email: 100413.1342@CompuServe.com"
  32.       Height          =   255
  33.       Left            =   780
  34.       TabIndex        =   4
  35.       Top             =   720
  36.       Width           =   3555
  37.    End
  38.    Begin Image Image1 
  39.       Height          =   480
  40.       Left            =   120
  41.       Top             =   120
  42.       Width           =   480
  43.    End
  44.    Begin Label Label4 
  45.       BackColor       =   &H00C0C0C0&
  46.       Caption         =   "This program is Freeware."
  47.       Height          =   195
  48.       Left            =   780
  49.       TabIndex        =   3
  50.       Top             =   1080
  51.       Width           =   2235
  52.    End
  53.    Begin Label Label2 
  54.       BackColor       =   &H00C0C0C0&
  55.       Caption         =   "Author: Rob McIntosh"
  56.       Height          =   195
  57.       Left            =   780
  58.       TabIndex        =   1
  59.       Top             =   420
  60.       Width           =   2295
  61.    End
  62.    Begin Label Label1 
  63.       BackColor       =   &H00C0C0C0&
  64.       Caption         =   "Clipboard Printer for Windows"
  65.       Height          =   195
  66.       Left            =   780
  67.       TabIndex        =   0
  68.       Top             =   120
  69.       Width           =   2595
  70.    End
  71. Option Explicit
  72. Sub Command1_Click ()
  73. Unload Me
  74. End Sub
  75. Sub Form_Load ()
  76.     'Centre the Form on the Screen
  77.     Move (screen.Width / 2) - (Width / 2), (screen.Height / 2) - (Height / 2)
  78.     'load up the icon
  79.     image1.Picture = frmClipPrt.Icon
  80. End Sub
  81.